home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2000 #1 / Amiga Plus CD - 2000 - No. 1.iso / Tools / Text / Edit / GoldED-Demo / Uninstall < prev    next >
Encoding:
Text File  |  1999-12-03  |  4.9 KB  |  172 lines

  1. ; $VER: GoldED Studio Uninstall 6.0.4 (11.06.99)
  2.  
  3. (delopts "oknodelete" "force" "askuser")
  4.  
  5. ; -------------------------------- set strings ---------------------------------
  6.  
  7. (if (= @language "deutsch")
  8.  
  9.     (
  10.         (set #studio_notfound "Es wurde keine vorhandene Installation gefunden !")
  11.  
  12.         (set #studio_uninstall
  13.  
  14.             (cat
  15.  
  16.                 "Dieses Programm entfernt GoldED Studio von ihrem Computer !\n\n"
  17.  
  18.                 "Verwenden Sie dieses Programm nur, wenn GoldED Studio komplett gelöscht werden soll. Einzelne Komponenten können mit dem normalen Setup-Programm entfernt werden.\n\n"
  19.  
  20.                 "Wir empfehlen die Verwendung diese Programms nur DIREKT NACH EINEM NEUSTART. Es sollten vorher keine anderen Programme gestartet worden sein.\n\n"
  21.             )
  22.         )
  23.  
  24.         (set #studio_uninstall_help "Das Studio-Verzeichnis und alle Unterverzeichnisse werden entfernt, wenn Sie fortfahren !")
  25.  
  26.         (set #studio_uninstall_uninstall "Fortfahren")
  27.  
  28.         (set #studio_uninstall_cancel "Abbrechen")
  29.  
  30.         (set #studio_confirm "Gefundene Installation: ")
  31.  
  32.         (set #studio_confirm_uninstall "Entfernen")
  33.  
  34.         (set #studio_confirm_cancel "Abbrechen")
  35.  
  36.         (set #studio_uninstalling "GoldED Studio wird entfernt ...")
  37.  
  38.         (set #studio_error "Deinstallation abgeschlossen. Es konnten nicht alle Komponenten entfernt werden. Beenden Sie alle Programme, starten Sie den Rechner neu und löschen Sie die verbleibenden Dateien.")
  39.     )
  40.  
  41.     ; english strings
  42.  
  43.     (
  44.         (set #studio_notfound "Es wurde keine vorhandene Installation gefunden !")
  45.  
  46.         (set #studio_uninstall
  47.  
  48.             (cat
  49.  
  50.                 "This program removes GoldED Studio from your computer !\n\n"
  51.  
  52.                 "Use this program to have GoldED Studio completely removed from your computer. Use the normal setup program to remove specific components.\n\n"
  53.  
  54.                 "We recommend to use this program directly after a reboot only. No other programs should have been started before uninstallation.\n\n"
  55.             )
  56.         )
  57.  
  58.         (set #studio_uninstall_help "The Studio directory and all subdirectories are deleted if you proceed !")
  59.  
  60.         (set #studio_uninstall_uninstall "Proceed")
  61.  
  62.         (set #studio_uninstall_cancel "Cancel")
  63.  
  64.         (set #studio_confirm "Installation detected: ")
  65.  
  66.         (set #studio_confirm_cancel "Cancel")
  67.  
  68.         (set #studio_confirm_uninstall "Delete")
  69.  
  70.         (set #studio_uninstalling "Uninstalling ...")
  71.  
  72.         (set #studio_error "Uninstallation completed. Some files could not be removed. Terminate all programs, reboot your computer and delete the remaining files manually.")
  73.     )
  74. )
  75.  
  76. ; ---------------------------------- uninstall ---------------------------------
  77.  
  78. (if (exists "golded:" (noreq))
  79.  
  80.     (
  81.         (set uninstallpath (expandpath "golded:"))
  82.  
  83.         (set continue
  84.  
  85.             (askbool
  86.  
  87.                 (prompt #studio_uninstall)
  88.  
  89.                 (help #studio_uninstall_help)
  90.  
  91.                 (choices
  92.  
  93.                     #studio_uninstall_uninstall
  94.                     #studio_uninstall_cancel
  95.                 )
  96.  
  97.                 (default 0)
  98.             )
  99.         )
  100.  
  101.         (if (= continue 1)
  102.  
  103.             (
  104.                 (set continue
  105.  
  106.                     (askbool
  107.  
  108.                         (prompt (cat #studio_confirm uninstallpath))
  109.  
  110.                         (help #studio_uninstall_help)
  111.  
  112.                         (choices
  113.  
  114.                               #studio_confirm_uninstall
  115.                               #studio_confirm_cancel
  116.                         )
  117.  
  118.                         (default 0)
  119.                     )
  120.                 )
  121.  
  122.                 (if (= continue 1)
  123.  
  124.                     (
  125.                         (working #studio_uninstalling)
  126.  
  127.                         (run "run <>NIL: installdata/programs/stopgolded")
  128.  
  129.                         ; delete drawer symbol
  130.  
  131.                         (delete
  132.  
  133.                             (tackon uninstallpath ".info")
  134.                         )
  135.  
  136.                         ; clean up startup sequence
  137.  
  138.                         (run "installdata/programs/stripstartup >NIL: LINES=6 SECTIONNAME=JOYCE")
  139.  
  140.                         (run "installdata/programs/stripstartup >NIL: LINES=6 SECTIONNAME=HiSpeed")
  141.  
  142.                         (run "installdata/programs/stripstartup >NIL: LINES=6 SECTIONNAME=GED_quick")
  143.  
  144.                         (run "installdata/programs/stripstartup >NIL: LINES=6 SECTIONNAME=GoldED")
  145.  
  146.                         ; get rid of active assigns pointing to golded directory
  147.  
  148.                         (run ("installdata/programs/remassigns >NIL: BASEDIR \"%s\"" uninstallpath))
  149.  
  150.                         ; delete root directory
  151.  
  152.                         (run ("installdata/programs/remdir >NIL: BASEDIR \"%s\"" uninstallpath))
  153.  
  154.                         (if (exists uninstallpath (noreq))
  155.  
  156.                             (message #studio_error)
  157.                         )
  158.                     )
  159.                 )
  160.             )
  161.         )
  162.  
  163.     )
  164.  
  165.     (message #studio_notfound)
  166. )
  167.  
  168. (exit (quiet))
  169.  
  170. (welcome)
  171.  
  172.